home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / xtalkv11.arc / DIRMMD01.XTS < prev    next >
Text File  |  1985-07-05  |  5KB  |  176 lines
  1. LAbel MDM01
  2. CLear
  3. SCreen T
  4. MEssage
  5. *══════════════════════════════════════════════════════════════════════*
  6. *     MARYLAND               301                                       *
  7. *══════════════════════════════════════════════════════════════════════*
  8. *  S  BBS/ADDRESS            SYSOP NAME/VOICE     BBS SETUP REQ'TS     *
  9. *══════════════════════════════════════════════════════════════════════*
  10. │  A: NAT'L BUREAU OF STDS   TED LANDBERG         1200-N-8-1 IBM3101   │
  11. │                            301-921-3485         301-948-5717  FIDO   │
  12. │                                                                      │
  13. │  B: NAT'L BUREAU OF STDS   TED LANDBERG         1200-N-8-1 IBM3101   │
  14. │                            301-921-3485         301-948-5718  FIDO   │
  15. │                                                                      │
  16. │  C:                        LARRY JORDAN         1200-N-8-1 IBM3101   │
  17. │     GAITHERSBURG, MD                            301-251-6293  RBBS   │
  18. │                                                                      │
  19. │  D:                                             1200-N-8-1 IBM3101   │
  20. │                                                                      │
  21. │                                                                      │
  22. │  E:                                                                  │
  23. │                                                                      │
  24. *══════════════════════════════════════════════════════════════════════*
  25. * P-XTALK / Q-XDOS  / R-RESTART SCRIPT / S-PREV MENU / T-NEXT MENU     *
  26. * U-RETURN TO STATE SELECTIONS                                         *
  27. *══════════════════════════════════════════════════════════════════════*
  28. .
  29. LAbel MDQ01-A
  30. ASk     Enter CHOICE:
  31. IF A,B,C     SKip MDD01-@
  32. IF P,Q,R,S,T SKip MDD01-@
  33. IF U         SKip MDD01-@
  34. CLear
  35. MEssage
  36. *══════════════════════════════════════════════════════════════════════*
  37. * A MENU HAS NOT BEEN SETUP FOR THAT BBS YET - PRESS ENTER TO CON'T    *
  38. *══════════════════════════════════════════════════════════════════════*
  39. .
  40. ALarm 2 now
  41. WAit echo
  42. JUmp MDM01
  43. ;
  44. LAbel MDD01-A
  45. Nu 1(301)948-5717
  46. Na NATIONAL BUREAU OF STDS #1
  47. Skip DIAL
  48. ;
  49. LAbel MDD01-B
  50. Nu 1(301)948-5718
  51. Na NATIONAL BUREAU OF STDS #2
  52. Skip DIAL
  53. ;
  54. LAbel MDD01-C
  55. Nu 1(301)251-6293
  56. Na LARRY JORDAN
  57. Skip DIAL
  58. ;
  59. LAbel MDD01-P
  60. JUmp RETXTALK
  61. ;
  62. LAbel MDD01-Q
  63. JUmp  XDOS
  64. ;
  65. LAbel MDD01-R
  66. rwind
  67. ;
  68. LAbel MDD01-S
  69. JUmp  MDM01
  70. ;
  71. LAbel MDD01-T
  72. JUmp  MDM02
  73. ;
  74. LAbel MDD01-U
  75. JUmp  DIRMRETN
  76. ;
  77. LAbel MDM02
  78. CLear
  79. MEssage
  80. *══════════════════════════════════════════════════════════════════════*
  81. *     MARYLAND               301                                       *
  82. *══════════════════════════════════════════════════════════════════════*
  83. *  S  BBS/ADDRESS            SYSOP NAME/VOICE     BBS SETUP REQ'TS     *
  84. *══════════════════════════════════════════════════════════════════════*
  85. │  A:                                                                  │
  86. │                                                                      │
  87. │                                                                      │
  88. │  B:                                                                  │
  89. │                                                                      │
  90. │                                                                      │
  91. │  C:                                                                  │
  92. │                                                                      │
  93. │                                                                      │
  94. │  D:                                                                  │
  95. │                                                                      │
  96. │                                                                      │
  97. │  E:                                                                  │
  98. │                                                                      │
  99. *══════════════════════════════════════════════════════════════════════*
  100. * P-XTALK / Q-XDOS  / R-RESTART SCRIPT / S-PREV MENU / T-NEXT MENU     *
  101. * U-RETURN TO STATE SELECTIONS                                         *
  102. *══════════════════════════════════════════════════════════════════════*
  103. .
  104. LAbel MDQ02-A
  105. ASk     Enter CHOICE:
  106. IF P,Q,R,S,T,U SKip MDD02-@
  107. CLear
  108. MEssage
  109. *══════════════════════════════════════════════════════════════════════*
  110. * A MENU HAS NOT BEEN SETUP FOR THAT BBS YET - PRESS ENTER TO CON'T    *
  111. *══════════════════════════════════════════════════════════════════════*
  112. .
  113. ALarm 3 now
  114. WAit echo
  115. JUmp MDM02
  116.  
  117.  
  118. LAbel MDD02-P
  119. JUmp  RETXTALK
  120.  
  121. LAbel MDD02-Q
  122. JUmp  XDOS
  123.  
  124. LAbel MDD02-R
  125. RWind
  126.  
  127. LAbel MDD02-S
  128. JUmp  MDM01
  129.  
  130. LAbel MDD02-T
  131. JUmp  MDM01
  132.  
  133. LAbel MDD02-U
  134. JUmp  DIRMRETN
  135. ;
  136. LAbel XDOS
  137. CLear
  138. SCreen s
  139. XDOS
  140. ;
  141. LAbel RESET
  142. CLear
  143. SCreen s
  144. LOad std
  145.  
  146. Label RETXTALK
  147. CLear
  148. SCreen S
  149. ABORT
  150. ;
  151. Label DIAL
  152. CLear
  153. SCreen S
  154. AL 2
  155. MEssage
  156.  
  157.  
  158.  
  159.         ██ ██ ██ ██ ██ ██ ██ ██     DIALING    ██ ██ ██ ██ ██ ██ ██ ██
  160.  
  161.  
  162.  
  163. .
  164. GO R3/35
  165. WAit quiet 10
  166. reply |
  167. SCreen T
  168. JUmp   CONNECT
  169. ;
  170. LAbel DIRMRETN
  171. CLear
  172. LOad  DIRMENU
  173. ;
  174. LAbel CONNECT
  175. AL 3
  176.